home *** CD-ROM | disk | FTP | other *** search
/ The Complete Work of Mahatma Gandhi / The Complete Work of Mahatma Gandhi-CD interactive.iso / mac / Ganmac / eb.cst / 00152_Script_volume < prev    next >
Text File  |  1999-09-22  |  1KB  |  38 lines

  1. on mouseUp
  2.   --  Volume Control
  3.   global gvolume, handcur
  4.   set xx to the clickOn
  5.   if xx > 0 then
  6.     global gloson
  7.     global cspname
  8.     
  9.     set yy to chars(cspname,1,1)
  10.     if (gloson=1) or (the visible of window "gloss"=TRUE) then
  11.       set the memberNum of sprite 115 to the number of member (yy&"glos") of castLib "eb.cst"
  12.       endNewMovie
  13.     end if
  14.     if the visible of sprite 106 = false then
  15.       
  16.       checkvol yy
  17.       set mm to the name of member (the memberNum of sprite xx) of castLib "eb.cst"
  18.       set the memberNum of sprite xx to the number of member ("r"&mm) of castLib "eb.cst"
  19.       set the visible of sprite 106 to true
  20.       set the visible of sprite 107 to true
  21.       set the visible of sprite 108 to true
  22.       CHASPCURSOR handcur,106,108
  23.       updateStage
  24.     else
  25.       set ii to the name of member (the memberNum of sprite xx) of castLib "eb.cst"
  26.       set mm to chars(ii,2,6)
  27.       set the memberNum of sprite xx to the number of member mm 
  28.       set the visible of sprite 106 to false
  29.       set the visible of sprite 107 to false
  30.       set the visible of sprite 108 to false
  31.       CHASPCURSOR -1,106,108
  32.       updateStage
  33.     end if
  34.     
  35.   end if
  36.   
  37. end
  38.